Código fuente de 'Cambia color de fondo.asp'

<html>

<head>
<title>Cambia color de fondo - Códigos asp, programacion asp, descargas asp, rutinas asp</title>
</head>

<body style="font-family: Arial; font-size: 9pt">

<center><b><font face="Arial" size="3">Cambia color de fondo</font></b></center><br><br>


Introduce un valor hexadecimal para el nuevo color de fondo (Ej: AB123C):<br>


<!--  Coded by Nicolai Kofoed, zelebris@theportal.dk
	' http://www.Planet-Source-Code.com/vb/scripts/ShowCode.asp?txtCodeId=6146&lngWId=4
-->

    <%@ Language=VBScript %>
    <SCRIPT Language=VBScript>
    	Sub Color
    		window.document.bgColor = text1.value
    			MsgBox "Color de fondo cambiado al nuevo, con código: " & window.document.bgColor,vbokonly,"Se cambió el color de fondo"
    		Text1.value = ""
    	End Sub
    </SCRIPT>

    &nbsp;<INPUT id=text1 name=text1>
    
    <INPUT id=submit1 name=submit1 type=submit value=Enviar onclick =vbscript:color>
    </BODY>
    </HTML>